home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / et / et3_0-a1.lha / et3 / src / CONTAINER / SortedOList.C < prev    next >
C/C++ Source or Header  |  1992-06-09  |  2KB  |  86 lines
  1. #ifdef __GNUG__
  2. #pragma implementation
  3. #endif
  4.  
  5. #include "SortedOList.h"
  6. #include "Class.h"
  7.  
  8. //---- SortedObjList -----------------------------------------------------------
  9.  
  10. NewMetaImpl0(SortedObjList,ObjList);
  11.  
  12. SortedObjList::SortedObjList(bool order)
  13. { 
  14.     if ( order == cSortAscending )
  15.     SetFlag(SObListAscending);
  16. }
  17.  
  18. Object *SortedObjList::Add(Object *op)
  19. {
  20.     register ObjLink *ll;
  21.     register int comp;
  22.     
  23.     if ( IsArgNull("Add", op) )
  24.     return 0;
  25.  
  26.     ll= anchor->Next();
  27.     while ( ll != anchor ) {
  28.     comp= CompareObjects(op, ll->Op());
  29.     if ( (Ascending() && comp < 0) || (! Ascending() && comp > 0) ) {
  30.         InsertLink(op, ll);
  31.         return 0;
  32.     }
  33.     ll= ll->Next();
  34.     }    
  35.     ObjList::Add(op); 
  36.     return 0;
  37. }
  38.  
  39. Object *SortedObjList::AddFirst(Object *op)
  40. {
  41.     MayNotUse("AddFirst");
  42.     return Add(op);
  43. }
  44.  
  45. Object *SortedObjList::AddLast(Object *op)
  46. {
  47.     MayNotUse("AddLast");
  48.     return Add(op);
  49. }
  50.  
  51. Object *SortedObjList::AddBefore(Object *op, Object *)
  52. {
  53.     MayNotUse("AddBefore");
  54.     return Add(op);
  55. }
  56.  
  57. Object *SortedObjList::AddAfter(Object *op, Object *)
  58. {
  59.     MayNotUse("AddAfter");
  60.     return Add(op);
  61. }
  62.  
  63. Object *SortedObjList::AddBeforePtr(Object *op, Object *)
  64. {
  65.     MayNotUse("AddBeforePtr");
  66.     return Add(op);
  67. }
  68.  
  69. Object *SortedObjList::AddAfterPtr(Object *op, Object *)
  70. {
  71.     MayNotUse("AddAfterPtr");
  72.     return Add(op);
  73. }
  74.  
  75. Object *SortedObjList::PutAt(Object *op, int)
  76. {
  77.     MayNotUse("PutAt");
  78.     return Add(op);
  79. }
  80.  
  81. int SortedObjList::CompareObjects(Object *op1, Object *op2)
  82. {
  83.     return op1->Compare(op2);
  84. }
  85.  
  86.